home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / adx7mu1a / players.frm < prev    next >
Text File  |  1999-10-10  |  43KB  |  1,245 lines

  1. VERSION 5.00
  2. Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
  3. Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "RICHTX32.OCX"
  4. Begin VB.Form MainBoard 
  5.    Appearance      =   0  'Flat
  6.    AutoRedraw      =   -1  'True
  7.    BackColor       =   &H00C0C0C0&
  8.    Caption         =   "Tic-Tac-Toe"
  9.    ClientHeight    =   6285
  10.    ClientLeft      =   60
  11.    ClientTop       =   630
  12.    ClientWidth     =   8175
  13.    FillColor       =   &H00FFFFFF&
  14.    BeginProperty Font 
  15.       Name            =   "Comic Sans MS"
  16.       Size            =   9.75
  17.       Charset         =   0
  18.       Weight          =   400
  19.       Underline       =   0   'False
  20.       Italic          =   0   'False
  21.       Strikethrough   =   0   'False
  22.    EndProperty
  23.    FontTransparent =   0   'False
  24.    ForeColor       =   &H00000040&
  25.    Icon            =   "players.frx":0000
  26.    LinkTopic       =   "Form1"
  27.    Picture         =   "players.frx":000C
  28.    ScaleHeight     =   419
  29.    ScaleMode       =   3  'Pixel
  30.    ScaleWidth      =   545
  31.    StartUpPosition =   2  'CenterScreen
  32.    Begin VB.TextBox chatbox 
  33.       BeginProperty Font 
  34.          Name            =   "Comic Sans MS"
  35.          Size            =   8.25
  36.          Charset         =   0
  37.          Weight          =   400
  38.          Underline       =   0   'False
  39.          Italic          =   0   'False
  40.          Strikethrough   =   0   'False
  41.       EndProperty
  42.       Height          =   330
  43.       Left            =   480
  44.       TabIndex        =   17
  45.       Text            =   "Type Message Here"
  46.       Top             =   5280
  47.       Visible         =   0   'False
  48.       Width           =   2535
  49.    End
  50.    Begin VB.CommandButton send_chat 
  51.       Caption         =   "Send"
  52.       Default         =   -1  'True
  53.       Height          =   375
  54.       Left            =   3120
  55.       TabIndex        =   3
  56.       Top             =   5280
  57.       Visible         =   0   'False
  58.       Width           =   975
  59.    End
  60.    Begin VB.Frame Frame1 
  61.       Caption         =   "Tic Tac Chat"
  62.       Height          =   2775
  63.       Left            =   360
  64.       TabIndex        =   15
  65.       Top             =   3000
  66.       Visible         =   0   'False
  67.       Width           =   3975
  68.       Begin RichTextLib.RichTextBox chatlabel 
  69.          Height          =   1815
  70.          Left            =   120
  71.          TabIndex        =   16
  72.          Top             =   360
  73.          Width           =   3735
  74.          _ExtentX        =   6588
  75.          _ExtentY        =   3201
  76.          _Version        =   393217
  77.          Enabled         =   -1  'True
  78.          TextRTF         =   $"players.frx":6AA8
  79.          BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  80.             Name            =   "Comic Sans MS"
  81.             Size            =   8.25
  82.             Charset         =   0
  83.             Weight          =   400
  84.             Underline       =   0   'False
  85.             Italic          =   0   'False
  86.             Strikethrough   =   0   'False
  87.          EndProperty
  88.       End
  89.    End
  90.    Begin VB.Timer Timer4 
  91.       Enabled         =   0   'False
  92.       Interval        =   5000
  93.       Left            =   5250
  94.       Top             =   510
  95.    End
  96.    Begin MSComctlLib.StatusBar StatusBar1 
  97.       Align           =   2  'Align Bottom
  98.       Height          =   315
  99.       Left            =   0
  100.       TabIndex        =   14
  101.       Top             =   5970
  102.       Width           =   8175
  103.       _ExtentX        =   14420
  104.       _ExtentY        =   556
  105.       Style           =   1
  106.       _Version        =   393216
  107.       BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
  108.          NumPanels       =   1
  109.          BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
  110.          EndProperty
  111.       EndProperty
  112.    End
  113.    Begin VB.CommandButton restart 
  114.       Caption         =   "Restart Game"
  115.       Enabled         =   0   'False
  116.       BeginProperty Font 
  117.          Name            =   "Arial"
  118.          Size            =   8.25
  119.          Charset         =   0
  120.          Weight          =   400
  121.          Underline       =   0   'False
  122.          Italic          =   0   'False
  123.          Strikethrough   =   0   'False
  124.       EndProperty
  125.       Height          =   450
  126.       Left            =   3150
  127.       TabIndex        =   2
  128.       Top             =   2235
  129.       Width           =   1245
  130.    End
  131.    Begin VB.Label Game_Over 
  132.       Alignment       =   2  'Center
  133.       AutoSize        =   -1  'True
  134.       BackColor       =   &H00C0C0C0&
  135.       BackStyle       =   0  'Transparent
  136.       BeginProperty Font 
  137.          Name            =   "Comic Sans MS"
  138.          Size            =   14.25
  139.          Charset         =   0
  140.          Weight          =   700
  141.          Underline       =   0   'False
  142.          Italic          =   -1  'True
  143.          Strikethrough   =   0   'False
  144.       EndProperty
  145.       ForeColor       =   &H000000FF&
  146.       Height          =   330
  147.       Left            =   6060
  148.       TabIndex        =   13
  149.       Top             =   5100
  150.       Width           =   135
  151.    End
  152.    Begin VB.Label Layer_A 
  153.       Caption         =   "Label9"
  154.       BeginProperty Font 
  155.          Name            =   "Arial"
  156.          Size            =   8.25
  157.          Charset         =   0
  158.          Weight          =   400
  159.          Underline       =   0   'False
  160.          Italic          =   0   'False
  161.          Strikethrough   =   0   'False
  162.       EndProperty
  163.       Height          =   525
  164.       Index           =   8
  165.       Left            =   6675
  166.       TabIndex        =   12
  167.       Top             =   4095
  168.       Width           =   555
  169.    End
  170.    Begin VB.Label Layer_A 
  171.       Caption         =   "Label9"
  172.       BeginProperty Font 
  173.          Name            =   "Arial"
  174.          Size            =   8.25
  175.          Charset         =   0
  176.          Weight          =   400
  177.          Underline       =   0   'False
  178.          Italic          =   0   'False
  179.          Strikethrough   =   0   'False
  180.       EndProperty
  181.       Height          =   525
  182.       Index           =   7
  183.       Left            =   5835
  184.       TabIndex        =   11
  185.       Top             =   4095
  186.       Width           =   555
  187.    End
  188.    Begin VB.Label Layer_A 
  189.       BackColor       =   &H00000000&
  190.       Caption         =   "Label9"
  191.       BeginProperty Font 
  192.          Name            =   "Arial"
  193.          Size            =   8.25
  194.          Charset         =   0
  195.          Weight          =   400
  196.          Underline       =   0   'False
  197.          Italic          =   0   'False
  198.          Strikethrough   =   0   'False
  199.       EndProperty
  200.       Height          =   525
  201.       Index           =   6
  202.       Left            =   4950
  203.       TabIndex        =   10
  204.       Top             =   4095
  205.       Width           =   555
  206.    End
  207.    Begin VB.Label Layer_A 
  208.       Caption         =   "Label9"
  209.       BeginProperty Font 
  210.          Name            =   "Arial"
  211.          Size            =   8.25
  212.          Charset         =   0
  213.          Weight          =   400
  214.          Underline       =   0   'False
  215.          Italic          =   0   'False
  216.          Strikethrough   =   0   'False
  217.       EndProperty
  218.       Height          =   525
  219.       Index           =   5
  220.       Left            =   6675
  221.       TabIndex        =   9
  222.       Top             =   3180
  223.       Width           =   555
  224.    End
  225.    Begin VB.Label Layer_A 
  226.       Caption         =   "Label9"
  227.       BeginProperty Font 
  228.          Name            =   "Arial"
  229.          Size            =   8.25
  230.          Charset         =   0
  231.          Weight          =   400
  232.          Underline       =   0   'False
  233.          Italic          =   0   'False
  234.          Strikethrough   =   0   'False
  235.       EndProperty
  236.       Height          =   525
  237.       Index           =   4
  238.       Left            =   5835
  239.       TabIndex        =   8
  240.       Top             =   3180
  241.       Width           =   555
  242.    End
  243.    Begin VB.Label Layer_A 
  244.       Caption         =   "Label9"
  245.       BeginProperty Font 
  246.          Name            =   "Arial"
  247.          Size            =   8.25
  248.          Charset         =   0
  249.          Wei